home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
sine blobs 1
< prev
next >
Wrap
Text File
|
1999-06-15
|
721b
|
26 lines
Category: Filter Factory Gallery U
Title: Sine Blobs 1
Author: Greg Schorno
Copyright: Copyright: 1996 (c) Greg Schorno
ctl[0]: Control 1
ctl[1]: Control 2
ctl[2]: Control 3
ctl[3]: Control 4
ctl[4]: Color Phase
ctl[5]: Red Freq
ctl[6]:Green Freq
ctl[7]: Blue Freq
val[0]: 13
val[1]: 21
val[2]: 31
val[3]: 49
val[4]: 70
val[5]: 125
val[6]: 112
val[7]: 2
R:put((sin(x*ctl(0)*32/M+cos(y*ctl(1)*16/M))*32+sin(y*ctl(2)*32/M+cos(x*ctl(3)*16/M))*32),1),put(get(1)*ctl(5)/128/128+val(4,-255,255),0),get(0)&256?511-(get(0)&511):get(0)&255
G:put(get(1)*ctl(6)/128/128+val(4,-255,255),0),get(0)&256?511-(get(0)&511):get(0)&255
B:put(get(1)*ctl(7)/128/128+val(4,-255,255),0),get(0)&256?511-(get(0)&511):get(0)&255
A:a